home *** CD-ROM | disk | FTP | other *** search
/ PC User 1997 April / PCU_APR_97.ISO / offline / webmenu.dcr / Internal_9_Rollover Test.ls < prev    next >
Encoding:
Text File  |  1997-02-28  |  2.0 KB  |  65 lines

  1. on rolloverTest
  2.   global gIcon, gActiveIcon
  3.   set CurrentIcon to gIcon
  4.   repeat with i = 1 to 6
  5.     if rollOver(i) then
  6.       set gIcon to i
  7.       exit repeat
  8.       next repeat
  9.     end if
  10.     set gIcon to 0
  11.   end repeat
  12.   if gIcon <> gActiveIcon then
  13.     if gIcon = 1 then
  14.       set the memberNum of sprite 1 to the number of member "whats new hilite"
  15.     else
  16.       if gIcon = 2 then
  17.         set the memberNum of sprite 2 to the number of member "software hilite"
  18.       else
  19.         if gIcon = 3 then
  20.           set the memberNum of sprite 3 to the number of member "guides hilite"
  21.         else
  22.           if gIcon = 4 then
  23.             set the memberNum of sprite 4 to the number of member "workshop hilite"
  24.           else
  25.             if gIcon = 5 then
  26.               set the memberNum of sprite 5 to the number of member "sites hilite"
  27.             else
  28.               if gIcon = 6 then
  29.                 set the memberNum of sprite 6 to the number of member "aboutus hilite"
  30.               end if
  31.             end if
  32.           end if
  33.         end if
  34.       end if
  35.     end if
  36.     repeat with i = 1 to 6
  37.       if (i <> gIcon) and (i <> gActiveIcon) then
  38.         if i = 1 then
  39.           set the memberNum of sprite 1 to the number of member "whats new basic"
  40.           next repeat
  41.         end if
  42.         if i = 2 then
  43.           set the memberNum of sprite 2 to the number of member "software basic"
  44.           next repeat
  45.         end if
  46.         if i = 3 then
  47.           set the memberNum of sprite 3 to the number of member "guides basic"
  48.           next repeat
  49.         end if
  50.         if i = 4 then
  51.           set the memberNum of sprite 4 to the number of member "workshop basic"
  52.           next repeat
  53.         end if
  54.         if i = 5 then
  55.           set the memberNum of sprite 5 to the number of member "sites basic"
  56.           next repeat
  57.         end if
  58.         if i = 6 then
  59.           set the memberNum of sprite 6 to the number of member "aboutus basic"
  60.         end if
  61.       end if
  62.     end repeat
  63.   end if
  64. end
  65.